home *** CD-ROM | disk | FTP | other *** search
/ Aminet 39 / Aminet 39 (2000)(Schatztruhe)[!][Oct 2000].iso / Aminet / dev / e / BetterString_E.lha / BetterString_E / src / BetterString_mcc.e
Encoding:
Text File  |  2000-06-29  |  3.2 KB  |  100 lines
  1. OPT MODULE
  2. OPT PREPROCESS
  3. OPT EXPORT
  4. /*
  5. **
  6. ** $VER: BetterString_mcc.h V11.5 (21-May-00)
  7. ** Copyright © 2000 Allan Odgaard. All rights reserved.
  8. **
  9. ** Translated to Amiga-E by Daniel 'Deniil' Westerberg.
  10. ** Macro #defines also added by Daniel 'Deniil' Westerberg.
  11. */
  12.  
  13. MODULE 'exec/types'
  14.  
  15. #define   MUIC_BetterString     'BetterString.mcc'
  16. #define   BetterStringObject    Mui_NewObjectA(MUIC_BetterString,[TAG_IGNORE,0
  17.  
  18. #define MUIA_BetterString_Columns       $ad001005
  19. #define MUIA_BetterString_NoInput       $ad001007
  20. #define MUIA_BetterString_SelectSize    $ad001001
  21. #define MUIA_BetterString_StayActive    $ad001003
  22. #define MUIM_BetterString_ClearSelected $ad001004
  23. #define MUIM_BetterString_FileNameStart $ad001006
  24. #define MUIM_BetterString_Insert        $ad001002
  25.  
  26. #define MUIV_BetterString_Insert_StartOfString  $00000000
  27. #define MUIV_BetterString_Insert_EndOfString    $fffffffe
  28. #define MUIV_BetterString_Insert_BufferPos      $ffffffff
  29.  
  30. #define MUIR_BetterString_FileNameStart_Volume  $ffffffff
  31.  
  32. #define BString(contents)\
  33.         BetterStringObject,\
  34.                 StringFrame,\
  35.                 MUIA_String_Contents, contents,\
  36.                 MUIA_CycleChain, MUI_TRUE,\
  37.                 End
  38.  
  39. #define BStringID(contents,id)\
  40.         BetterStringObject,\
  41.                 StringFrame,\
  42.                 MUIA_String_Contents, contents,\
  43.                 MUIA_ObjectID,id,\
  44.                 MUIA_CycleChain, MUI_TRUE,\
  45.                 End
  46.  
  47. #define BKeyString(contents,controlchar)\
  48.         BetterStringObject,\
  49.                 StringFrame,\
  50.                 MUIA_ControlChar    , controlchar,\
  51.                 MUIA_CycleChain     ,MUI_TRUE,\
  52.                 MUIA_String_Contents, contents,\
  53.                 End
  54.  
  55. #define BKeyStringID(contents,controlchar,id)\
  56.         BetterStringObject,\
  57.                 StringFrame,\
  58.                 MUIA_ControlChar    , controlchar,\
  59.                 MUIA_CycleChain     ,MUI_TRUE,\
  60.                 MUIA_String_Contents, contents,\
  61.                 MUIA_ObjectID,id,\
  62.                 End
  63.  
  64. #define BLString(contents,maxlen)\
  65.         BetterStringObject,\
  66.                 StringFrame,\
  67.                 MUIA_String_MaxLen  , maxlen,\
  68.                 MUIA_String_Contents, contents,\
  69.                 MUIA_CycleChain, MUI_TRUE,\
  70.                 End
  71.  
  72. #define BLStringID(contents,maxlen,id)\
  73.         BetterStringObject,\
  74.                 StringFrame,\
  75.                 MUIA_String_MaxLen  , maxlen,\
  76.                 MUIA_String_Contents, contents,\
  77.                 MUIA_ObjectID,id,\
  78.                 MUIA_CycleChain, MUI_TRUE,\
  79.                 End
  80.  
  81. #define BLKeyString(contents,maxlen,controlchar)\
  82.         BetterStringObject,\
  83.                 StringFrame,\
  84.                 MUIA_ControlChar    , controlchar,\
  85.                 MUIA_CycleChain     ,MUI_TRUE,\
  86.                 MUIA_String_MaxLen  , maxlen,\
  87.                 MUIA_String_Contents, contents,\
  88.                 End
  89.  
  90. #define BLKeyStringID(contents,maxlen,controlchar,id)\
  91.         BetterStringObject,\
  92.                 StringFrame,\
  93.                 MUIA_ControlChar    , controlchar,\
  94.                 MUIA_CycleChain     ,MUI_TRUE,\
  95.                 MUIA_String_MaxLen  , maxlen,\
  96.                 MUIA_String_Contents, contents,\
  97.                 MUIA_ObjectID,id,\
  98.                 End
  99.  
  100.